home *** CD-ROM | disk | FTP | other *** search
/ Stone Design / Stone Design.iso / Stone_Friends / Wave / WavesWorld / Source / Shaders / WWShaders / WWTranslucentMetal.sl < prev    next >
Encoding:
Text File  |  1995-03-23  |  323 b   |  13 lines
  1. surface
  2. WWTranslucentMetal (float  Ka          = 1, 
  3.                        Ks          = 1, 
  4.                    roughness  = .25;
  5.                     color  opacity    = .5; )
  6. {
  7.     point Nf = faceforward(normalize(N), I);
  8.     point V = normalize(-I);
  9.     
  10.     Oi = Os * opacity;
  11.     Ci = Os * Cs * ( Ka*ambient() + Ks * specular(Nf, V, roughness));
  12. }
  13.